object DateTimeForm: TDateTimeForm
  Left = 367
  Top = 233
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Date and Time Entry'
  ClientHeight = 279
  ClientWidth = 338
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OnCreate = FormCreate
  PixelsPerInch = 125
  TextHeight = 16
  object Panel1: TPanel
    Left = 9
    Top = 9
    Width = 321
    Height = 264
    TabOrder = 0
    object DatePanel: TPanel
      Left = 9
      Top = 9
      Width = 304
      Height = 144
      BevelOuter = bvLowered
      TabOrder = 0
      object YearBox: TEdit
        Left = 152
        Top = 104
        Width = 49
        Height = 28
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        MaxLength = 4
        ParentFont = False
        TabOrder = 0
        Text = '1955'
      end
      object MonthBox: TComboBox
        Left = 152
        Top = 56
        Width = 133
        Height = 28
        Style = csDropDownList
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 20
        Items.Strings = (
          'January'
          'February'
          'March'
          'April'
          'May'
          'June'
          'July'
          'August'
          'September'
          'October'
          'November'
          'December')
        ParentFont = False
        TabOrder = 1
      end
      object Daybox: TComboBox
        Left = 152
        Top = 16
        Width = 57
        Height = 28
        Style = csDropDownList
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 20
        Items.Strings = (
          '01'
          '02'
          '03'
          '04'
          '05'
          '06'
          '07'
          '08'
          '09'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16'
          '17'
          '18'
          '19'
          '20'
          '21'
          '22'
          '23'
          '24'
          '25'
          '26'
          '27'
          '28'
          '29'
          '30'
          '31')
        ParentFont = False
        TabOrder = 2
      end
      object YearLabel: TPanel
        Left = 24
        Top = 104
        Width = 112
        Height = 28
        Alignment = taLeftJustify
        BevelOuter = bvNone
        Caption = 'Year:'
        TabOrder = 3
      end
      object MonthLabel: TPanel
        Left = 24
        Top = 56
        Width = 112
        Height = 28
        Alignment = taLeftJustify
        BevelOuter = bvNone
        Caption = 'Month:'
        TabOrder = 4
      end
      object DayLabel: TPanel
        Left = 24
        Top = 16
        Width = 112
        Height = 28
        Alignment = taLeftJustify
        BevelOuter = bvNone
        Caption = 'Day of month:'
        TabOrder = 5
      end
    end
    object TimePanel: TPanel
      Left = 8
      Top = 160
      Width = 305
      Height = 58
      BevelOuter = bvLowered
      TabOrder = 1
      object Label3: TLabel
        Left = 184
        Top = 16
        Width = 4
        Height = 20
        Caption = ':'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'System'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label1: TLabel
        Left = 241
        Top = 17
        Width = 2
        Height = 20
        Caption = ':'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'System'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object HourBox: TComboBox
        Left = 136
        Top = 16
        Width = 45
        Height = 24
        Style = csDropDownList
        ItemHeight = 16
        Items.Strings = (
          '00'
          '01'
          '02'
          '03'
          '04'
          '05'
          '06'
          '07'
          '08'
          '09'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16'
          '17'
          '18'
          '19'
          '20'
          '21'
          '22'
          '23')
        TabOrder = 0
      end
      object MinuteBox: TComboBox
        Left = 192
        Top = 16
        Width = 45
        Height = 24
        Style = csDropDownList
        ItemHeight = 16
        Items.Strings = (
          '00'
          '01'
          '02'
          '03'
          '04'
          '05'
          '06'
          '07'
          '08'
          '09'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16'
          '17'
          '18'
          '19'
          '20'
          '21'
          '22'
          '23'
          '24'
          '25'
          '26'
          '27'
          '28'
          '29'
          '30'
          '31'
          '32'
          '33'
          '34'
          '35'
          '36'
          '37'
          '38'
          '39'
          '40'
          '41'
          '42'
          '43'
          '44'
          '45'
          '46'
          '47'
          '48'
          '49'
          '50'
          '51'
          '52'
          '53'
          '54'
          '55'
          '56'
          '57'
          '58'
          '59')
        TabOrder = 1
      end
      object TimeLabel: TPanel
        Left = 8
        Top = 16
        Width = 112
        Height = 28
        Alignment = taLeftJustify
        BevelOuter = bvNone
        Caption = 'Time (24h format):'
        TabOrder = 2
      end
      object SecondBox: TComboBox
        Left = 248
        Top = 16
        Width = 45
        Height = 24
        Style = csDropDownList
        ItemHeight = 16
        Items.Strings = (
          '00'
          '01'
          '02'
          '03'
          '04'
          '05'
          '06'
          '07'
          '08'
          '09'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16'
          '17'
          '18'
          '19'
          '20'
          '21'
          '22'
          '23'
          '24'
          '25'
          '26'
          '27'
          '28'
          '29'
          '30'
          '31'
          '32'
          '33'
          '34'
          '35'
          '36'
          '37'
          '38'
          '39'
          '40'
          '41'
          '42'
          '43'
          '44'
          '45'
          '46'
          '47'
          '48'
          '49'
          '50'
          '51'
          '52'
          '53'
          '54'
          '55'
          '56'
          '57'
          '58'
          '59')
        TabOrder = 3
      end
    end
    object SetButton: TButton
      Left = 9
      Top = 224
      Width = 136
      Height = 31
      Caption = '&Set'
      TabOrder = 2
      OnClick = SetButtonClick
    end
    object CancelBtn: TButton
      Left = 176
      Top = 224
      Width = 139
      Height = 31
      Caption = '&Cancel'
      TabOrder = 3
      OnClick = CancelBtnClick
    end
  end
end